(open-line): Move fill-prefix insert inside save-excursion.
authorRichard M. Stallman <rms@gnu.org>
Fri, 31 Dec 1993 05:52:54 +0000 (05:52 +0000)
committerRichard M. Stallman <rms@gnu.org>
Fri, 31 Dec 1993 05:52:54 +0000 (05:52 +0000)
lisp/simple.el

index fe17f25a9defa90fe743d67a9ea41ddcf2328f14..2a471f61f9ec6caf7b5ee00ecb66b1b56315ac50 100644 (file)
@@ -46,8 +46,8 @@ With arg N, insert N newlines."
          (forward-char -1)))
     (while (> arg 0)
       (save-excursion
-        (insert ?\n))
-      (if do-fill-prefix (insert fill-prefix))
+        (insert ?\n)
+       (if do-fill-prefix (insert fill-prefix)))
       (setq arg (1- arg)))
     (if flag (forward-char 1))))